clear all; close all; clc;
R=47;
L=100e-6;
tau=L/R;
fprintf('tau = %f usec\n', tau*1e6);
T=tau/100000;
t=0:T:(5*tau);
lt=length(t);
stdn=sqrt(13);
E=stdn*randn(1,lt);
Ur(1)=0;
 
for k=2:lt
    Ur(k)=Ur(k-1)+(E(k-1)-Ur(k-1))*T*R/L;
end
figure(3);
plot(t*1e9,[Ur;E]);
xlabel('t,ns');
ylabel('U_r,E,Volt');
legend('U_r(t)','E(t)');
grid on
